home *** CD-ROM | disk | FTP | other *** search
/ Windows 6-Pak - Disc 4 / Windows 6-Pak (InfoMagic) (Disc 4) (1999).ISO / 3D-Graphics-Editors / lsystem3.exe / L System 3 / _setup.1 / PLANT01.LS < prev    next >
Text File  |  1994-08-29  |  342b  |  16 lines
  1. # --- plant01.ls ------C.J. van der Mark jr. ----------------------------------
  2. 10
  3. 20
  4. 20
  5. q
  6. q=[p][>(90)-(90)g(50).+(90)c(4)?(1)[x]]>(90)-(90)g(100).+(90)[p]
  7. p=sp
  8. s={ab[+Zh]<(90)ab[-Zh]}
  9. a=Z+(5)a
  10. b=Z-(5)b
  11. d=Z{[+++e.][++ee.][+eee.][eeee.][-eee.][--ee.][---e.]}
  12. h=cZZZt(3.2)$[++[++ZZd]ZZd][--[--ZZd]ZZd]ZZd
  13. x=Z(60)!(0.90)x
  14. e=t!g
  15. @
  16.